home *** CD-ROM | disk | FTP | other *** search
/ Oxygen Multimedia Graphics 22 / Oxygen Multimedia Graphics 22.iso / pc / System / OX22 / PDC_153_ShowFile_Final.ls < prev    next >
Encoding:
Text File  |  2008-03-12  |  441 b   |  17 lines
  1. global ds, goUp, gList, giNum, gtNum, gtColor
  2.  
  3. on mouseUp
  4.   imageName = "i" & giNum
  5.   tName = "t" & gtNum
  6.   ArtName = getAt(gList, imageName)
  7.   templateName = getAt(gList, tName)
  8.   ShowFile = the moviePath & goUp & "Artwork" & ds & ArtName & ds & templateName
  9.   put ShowFile
  10.   OpenIt = baOpenFile(ShowFile, EMPTY)
  11.   if the platform contains "Mac" then
  12.     Ok = baActivateWindow(baFindWindow("MACS", EMPTY))
  13.   else
  14.     nothing()
  15.   end if
  16. end
  17.